home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / M / MacPerl 4.13 appl.sit / MacPerl ƒ / macscripts / Rinaldis < prev    next >
MacBinary  |  1993-12-08  |  2.0 KB  |  [TEXT/McPL]

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Rinaldis

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Wed Dec 8 00:16:23 1993, modified Wed Dec 8 00:16:23 1993, creator 'McPL', type ASCII, 926 bytes "Rinaldis" , at 0x41e 799 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[McPL]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 52 69 6e 61 6c 64 | 69 73 00 00 00 00 00 00 |..Rinald|is......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 63 50 | 4c 01 00 00 00 00 00 00 |.TEXTMcP|L.......|
|00000050| 00 00 00 00 00 03 9e 00 | 00 03 1f a9 2b 13 a7 a9 |........|....+...|
|00000060| 2b 13 a7 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |+.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 23 25 00 00 |........|....#%..|
|00000080| 70 61 63 6b 61 67 65 20 | 52 69 6e 61 6c 64 69 3b |package |Rinaldi;|
|00000090| 0d 26 4d 61 63 50 65 72 | 6c 27 4c 6f 61 64 45 78 |.&MacPer|l'LoadEx|
|000000a0| 74 65 72 6e 61 6c 73 28 | 22 41 6c 69 67 6e 20 32 |ternals(|"Align 2|
|000000b0| 2e 37 20 28 55 53 29 22 | 29 3b 0d 26 4d 61 63 50 |.7 (US)"|);.&MacP|
|000000c0| 65 72 6c 27 4c 6f 61 64 | 45 78 74 65 72 6e 61 6c |erl'Load|External|
|000000d0| 73 28 22 41 72 63 68 69 | 76 65 43 6f 6e 74 65 6e |s("Archi|veConten|
|000000e0| 74 20 31 2e 31 20 28 55 | 53 29 22 29 3b 0d 26 4d |t 1.1 (U|S)");.&M|
|000000f0| 61 63 50 65 72 6c 27 4c | 6f 61 64 45 78 74 65 72 |acPerl'L|oadExter|
|00000100| 6e 61 6c 73 28 22 41 74 | 61 6c 6b 5a 6f 6e 65 73 |nals("At|alkZones|
|00000110| 20 31 2e 35 20 28 55 53 | 29 22 29 3b 0d 23 20 43 | 1.5 (US|)");.# C|
|00000120| 61 6c 65 6e 64 6f 69 64 | 20 64 6f 65 73 6e 27 74 |alendoid| doesn't|
|00000130| 20 77 6f 72 6b 20 28 79 | 65 74 29 2c 20 62 65 63 | work (y|et), bec|
|00000140| 61 75 73 65 20 69 74 20 | 6f 70 65 6e 73 20 61 6e |ause it |opens an|
|00000150| 20 65 78 74 65 72 6e 61 | 6c 20 77 69 6e 64 6f 77 | externa|l window|
|00000160| 2e 0d 26 4d 61 63 50 65 | 72 6c 27 4c 6f 61 64 45 |..&MacPe|rl'LoadE|
|00000170| 78 74 65 72 6e 61 6c 73 | 28 22 43 61 70 73 4c 6f |xternals|("CapsLo|
|00000180| 63 6b 20 31 2e 30 20 28 | 55 53 29 22 29 3b 0d 26 |ck 1.0 (|US)");.&|
|00000190| 4d 61 63 50 65 72 6c 27 | 4c 6f 61 64 45 78 74 65 |MacPerl'|LoadExte|
|000001a0| 72 6e 61 6c 73 28 22 43 | 68 6f 6f 73 65 43 6f 6c |rnals("C|hooseCol|
|000001b0| 6f 72 20 31 2e 31 20 28 | 55 53 29 22 29 3b 0d 26 |or 1.1 (|US)");.&|
|000001c0| 4d 61 63 50 65 72 6c 27 | 4c 6f 61 64 45 78 74 65 |MacPerl'|LoadExte|
|000001d0| 72 6e 61 6c 73 28 22 43 | 68 6f 6f 73 65 72 20 31 |rnals("C|hooser 1|
|000001e0| 2e 37 20 28 55 53 29 22 | 29 3b 0d 26 4d 61 63 50 |.7 (US)"|);.&MacP|
|000001f0| 65 72 6c 27 4c 6f 61 64 | 45 78 74 65 72 6e 61 6c |erl'Load|External|
|00000200| 73 28 22 43 6c 69 70 49 | 6e 66 6f 20 31 2e 30 20 |s("ClipI|nfo 1.0 |
|00000210| 28 55 53 29 22 29 3b 0d | 26 4d 61 63 50 65 72 6c |(US)");.|&MacPerl|
|00000220| 27 4c 6f 61 64 45 78 74 | 65 72 6e 61 6c 73 28 22 |'LoadExt|ernals("|
|00000230| 43 6f 70 79 46 6f 6c 64 | 65 72 20 32 2e 32 20 28 |CopyFold|er 2.2 (|
|00000240| 55 53 29 22 29 3b 0d 70 | 61 63 6b 61 67 65 20 6d |US)");.p|ackage m|
|00000250| 61 69 6e 3b 0d 0d 70 72 | 69 6e 74 20 26 52 69 6e |ain;..pr|int &Rin|
|00000260| 61 6c 64 69 27 41 6c 69 | 67 6e 28 22 6c 69 6e 65 |aldi'Ali|gn("line|
|00000270| 2c 27 65 6d 5c 6e 75 70 | 2c 6e 65 61 74 6c 79 22 |,'em\nup|,neatly"|
|00000280| 2c 20 22 31 30 2c 43 22 | 29 2c 20 22 5c 6e 22 3b |, "10,C"|), "\n";|
|00000290| 0d 70 72 69 6e 74 20 26 | 52 69 6e 61 6c 64 69 27 |.print &|Rinaldi'|
|000002a0| 41 72 63 68 69 76 65 43 | 6f 6e 74 65 6e 74 28 22 |ArchiveC|ontent("|
|000002b0| 6b 6e 75 74 68 3a 44 65 | 76 65 6c 6f 70 6d 65 6e |knuth:De|velopmen|
|000002c0| 74 3a 4d 61 63 50 65 72 | 6c 3a 44 65 6d 6f 3a 43 |t:MacPer|l:Demo:C|
|000002d0| 70 74 54 73 74 2e 63 70 | 74 22 29 2c 20 22 5c 6e |ptTst.cp|t"), "\n|
|000002e0| 22 3b 0d 70 72 69 6e 74 | 20 26 52 69 6e 61 6c 64 |";.print| &Rinald|
|000002f0| 69 27 41 54 61 6c 6b 5a | 6f 6e 65 73 28 29 2c 20 |i'ATalkZ|ones(), |
|00000300| 22 5c 6e 22 3b 0d 70 72 | 69 6e 74 20 26 52 69 6e |"\n";.pr|int &Rin|
|00000310| 61 6c 64 69 27 43 61 70 | 73 4c 6f 63 6b 28 29 2c |aldi'Cap|sLock(),|
|00000320| 20 22 5c 6e 22 3b 0d 70 | 72 69 6e 74 20 26 52 69 | "\n";.p|rint &Ri|
|00000330| 6e 61 6c 64 69 27 43 68 | 6f 6f 73 65 43 6f 6c 6f |naldi'Ch|ooseColo|
|00000340| 72 28 22 57 68 61 74 27 | 73 20 79 6f 75 72 20 66 |r("What'|s your f|
|00000350| 61 76 6f 72 69 74 65 20 | 63 6f 6c 6f 72 20 62 61 |avorite |color ba|
|00000360| 62 79 3f 22 29 2c 20 22 | 5c 6e 22 3b 0d 70 72 69 |by?"), "|\n";.pri|
|00000370| 6e 74 20 26 52 69 6e 61 | 6c 64 69 27 43 75 72 72 |nt &Rina|ldi'Curr|
|00000380| 50 72 69 6e 74 65 72 28 | 29 2c 20 22 5c 6e 22 3b |Printer(|), "\n";|
|00000390| 0d 70 72 69 6e 74 20 26 | 52 69 6e 61 6c 64 69 27 |.print &|Rinaldi'|
|000003a0| 43 6c 69 70 49 6e 66 6f | 28 29 2c 20 22 5c 6e 22 |ClipInfo|(), "\n"|
|000003b0| 3b 0d 23 20 70 72 69 6e | 74 20 26 52 69 6e 61 6c |;.# prin|t &Rinal|
|000003c0| 64 69 27 43 6f 70 79 46 | 6f 6c 64 65 72 28 22 6d |di'CopyF|older("m|
|000003d0| 65 72 6c 69 6e 3a 51 75 | 69 63 4b 65 79 73 20 53 |erlin:Qu|icKeys S|
|000003e0| 63 72 69 70 74 aa 22 2c | 20 22 6d 65 72 6c 69 6e |cript.",| "merlin|
|000003f0| 3a 51 4b 53 22 29 3b 0d | 70 72 69 6e 74 20 6a 6f |:QKS");.|print jo|
|00000400| 69 6e 28 22 5c 6e 22 2c | 20 6b 65 79 73 20 5f 52 |in("\n",| keys _R|
|00000410| 69 6e 61 6c 64 69 29 2c | 20 22 5c 6e 22 3b 00 00 |inaldi),| "\n";..|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 01 00 00 00 02 9c | 00 00 01 9c 00 00 00 83 |........|........|
|00000490| 1f 97 62 be 7c ec 8c cb | ac dc 4d 4a b4 10 24 27 |..b.|...|..MJ..$'|
|000004a0| 7e 3a c7 ea 35 39 d7 15 | ba 3a 76 b5 af 29 d9 af |~:..59..|.:v..)..|
|000004b0| 08 52 69 6e 61 6c 64 69 | 73 00 02 00 00 00 54 45 |.Rinaldi|s.....TE|
|000004c0| 58 54 4d 63 50 4c 01 00 | 00 00 00 00 00 00 00 00 |XTMcPL..|........|
|000004d0| 00 00 54 45 58 54 4d 63 | 50 4c 01 00 00 00 00 00 |..TEXTMc|PL......|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 a9 1e e8 3b 00 00 | 03 9e 00 00 03 1f 73 d0 |.....;..|......s.|
|00000500| 64 cb c8 61 7c b9 ad 18 | dc b6 63 e4 0c 71 80 00 |d..a|...|..c..q..|
|00000510| 00 00 00 00 04 7a 6c 04 | fa 00 02 00 0d 38 35 30 |.....zl.|.....850|
|00000520| 36 2e 30 30 33 2e 74 65 | 78 74 01 00 00 00 08 54 |6.003.te|xt.....T|
|00000530| 45 58 54 4d 41 43 41 a7 | 76 92 96 a7 76 92 97 01 |EXTMACA.|v...v...|
|00000540| 00 58 b9 11 2c 00 04 00 | 00 00 00 00 00 04 ef 00 |.X..,...|........|
|00000550| 00 00 00 00 00 03 43 0b | 4e 6f 77 20 43 61 74 61 |......C.|Now Cata|
|00000560| 6c 6f 67 01 00 00 03 4b | 50 42 42 2b 50 42 41 2b |log....K|PBB+PBA+|
|00000570| a8 ea 1f d6 a9 15 c5 ab | 01 00 5a 23 93 fa 00 02 |........|..Z#....|
|00000580| 00 00 00 78 00 05 00 00 | 00 48 00 48 00 00 00 00 |...x....|.H.H....|
|00000590| 03 0d 02 2f ff e7 ff ee | 03 31 02 41 1f 03 05 7b |.../....|.1.A...{|
|000005a0| 03 e0 00 01 00 00 01 2c | 01 2c 00 00 00 00 0c b6 |.......,|.,......|
|000005b0| 09 19 01 2c 00 2d 05 a0 | 5e ec 00 26 04 01 01 01 |...,.-..|^..&....|
|000005c0| 00 18 00 01 27 0f 00 01 | 00 01 00 00 00 00 00 00 |....'...|........|
|000005d0| 00 00 00 00 00 00 00 01 | 00 64 00 00 00 00 00 00 |........|.d......|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 01 00 00 02 | 41 00 00 00 00 00 01 10 |........|A.......|
|00000600| 00 3c 00 14 01 62 02 25 | 06 4d 6f 6e 61 63 6f 00 |.<...b.%|.Monaco.|
|00000610| 77 61 6e 74 74 79 70 65 | 00 00 00 04 63 77 69 6e |wanttype|....cwin|
|00000620| 66 72 6f 6d 6e 75 6c 6c | 00 00 00 00 66 6f 72 6d |fromnull|....form|
|00000630| 65 6e 75 6d 00 00 00 04 | 6e 61 6d 65 73 65 6c 64 |enum....|nameseld|
|00000640| 54 45 58 54 00 00 00 08 | 52 69 6e 61 6c 64 69 73 |TEXT....|Rinaldis|
|00000650| 66 6f 72 6d 65 6e 75 6d | 00 00 00 04 69 6e 64 78 |formenum|....indx|
|00000660| 73 65 6c 64 6c 6f 6e 67 | 00 00 00 04 00 00 03 8b |seldlong|........|
|00000670| 73 74 6f 70 6f 62 6a 20 | 00 00 00 8c 00 00 00 04 |stopobj |........|
|00000680| 00 00 00 00 77 61 6e 74 | 74 79 70 65 00 00 00 04 |....want|type....|
|00000690| 63 68 61 20 66 72 6f 6d | 6f 62 6a 20 00 00 00 48 |cha from|obj ...H|
|000006a0| 00 00 00 04 00 00 00 00 | 77 61 6e 74 74 79 70 65 |........|wanttype|
|000006b0| 00 00 00 04 63 77 69 6e | 66 72 6f 6d 6e 75 6c 6c |....cwin|fromnull|
|000006c0| 00 00 00 00 66 6f 72 6d | 65 6e 75 6d 00 00 00 04 |....form|enum....|
|000006d0| 6e 61 6d 65 73 65 6c 64 | 54 45 58 54 00 00 00 08 |nameseld|TEXT....|
|000006e0| 52 69 6e 61 6c 64 69 73 | 66 6f 72 6d 65 6e 75 6d |Rinaldis|formenum|
|000006f0| 00 00 00 04 69 6e 64 78 | 73 65 6c 64 6c 6f 6e 67 |....indx|seldlong|
|00000700| 00 00 00 04 00 00 03 8b | 00 09 01 c8 00 00 00 00 |........|........|
|00000710| 00 00 00 08 07 4d 61 63 | 50 65 72 6c 00 00 01 00 |.....Mac|Perl....|
|00000720| 00 00 02 9c 00 00 01 9c | 00 00 00 83 00 55 63 04 |........|.....Uc.|
|00000730| 14 92 00 00 00 1c 00 5a | 00 02 54 46 53 50 00 00 |.......Z|..TFSP..|
|00000740| 00 1a 54 46 53 53 00 00 | 00 26 53 54 52 20 00 00 |..TFSS..|.&STR ..|
|00000750| 00 32 00 ff 00 00 00 00 | 00 00 00 57 a3 38 00 ff |.2......|...W.8..|
|00000760| 00 0d 00 00 00 7c 00 57 | a3 2c bf f4 00 19 00 00 |.....|.W|.,......|
|00000770| 01 90 00 57 a3 30 0c 50 | 72 69 6e 74 65 72 20 49 |...W.0.P|rinter I|
|00000780| 6e 66 6f 0b 48 65 61 64 | 65 72 20 49 6e 66 6f 0f |nfo.Head|er Info.|
|00000790| 46 69 6e 64 65 72 20 41 | 70 70 20 49 6e 66 6f 00 |Finder A|pp Info.|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+